
On *:JOIN:#: {
  Set %HostList $read(HostList.txt,s, $nick $+ )
  If ( %HostList != $null ) {
    /mode # +o $nick

  }
}